MacHome 1999 February/March/MacHome CD (February and March 1999).iso/Edutainment/INFOHIGHWAYDEMOS/demo/MENU.DCR/scripts_29.ls

Text File | 1999-09-16 | 713 b | 20 lines

on enterFrame
  set startBalls to 4
  set reseauBall to startBalls
  set supportBall to startBalls + 1
  set revnumBall to startBalls + 2
  set convergMediaBall to startBalls + 3
  set inforouteChezVousBall to startBalls + 4
  set serviceReseauxBall to startBalls + 5
  set genealogieInforouteBall to startBalls + 6
  set the ink of sprite reseauBall to 37
  set the ink of sprite supportBall to 37
  set the ink of sprite revnumBall to 37
  set the ink of sprite convergMediaBall to 37
  set the ink of sprite inforouteChezVousBall to 37
  set the ink of sprite serviceReseauxBall to 37
  set the ink of sprite genealogieInforouteBall to 37
  depuppetize(reseauBall, genealogieInforouteBall)
  updateStage()
end